www.gusucode.com > 深度学习(asp)网址导航 v4.0.1 > 深度学习(asp)网址导航 v4.0.1\code\admin\channel\channel_Update.asp
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
projectRootPath = "../../" '相对当前应用程序根的位置
%>
<!-- #include file ="../include/checkPurview.asp"-->
<!--#include file="../../ConnDB.asp"-->
<!-- #include file="../include/Function.Manage.Config.asp"-->
<!--#include file="../../include/function.Common.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta name="robots" content="noindex,nofollow" />
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>频道修改</title>
<link rel="stylesheet" type="text/css" href="../themes/base.css"/>
<link href="../themes/<%=theme_Path%>/main.css" rel="stylesheet" type="text/css" />
<script language="javascript">
function form1_onsubmit()
{
if (document.form1.ChannelName.value=="")
{
window.alert("请输入栏目名称");
document.form1.ChannelName.focus();
return false;
}
}
function view(m)
{
var viewType0=document.getElementById("viewType0");
var viewType1a=document.getElementById("viewType1a");
var viewType1b=document.getElementById("viewType1b");
switch (m){
case "viewType0":
viewType0.style.display="block";
viewType1a.style.display="none";
viewType1b.style.display="none";
break;
case "viewType1":
viewType0.style.display="none";
viewType1a.style.display="block";
viewType1b.style.display="block";
break;
}
}
</script>
</head>
<body id="bodyBg1">
<br />
<a href="channel_Manage.asp">频道栏目管理</a> | <a href="Channel_Add.asp">频道栏目添加</a>
<hr class="Nav-hr" />
<br />
<dl class="manageContent">
<dt>频道栏目修改管理</dt>
<dd>
<br />
<%
if Request.Form("ChannelName") <> "" then
ID=Request.Form("ID")
ChannelName=Request.Form("ChannelName")
OrderID=Request.Form("OrderID")
Readme=Request.Form("Readme")
Place=Request.Form("Place")
ViewType=Request.Form("ViewType")
LinkUrl=Request.Form("LinkUrl")
ContentTittle=Request.Form("ContentTittle")
Content=Request.Form("Content")
isView=Request.Form("isView")
fchannelPic=Request.Form("fchannelPic")
fuploadFiles=Request.Form("fuploadFiles")
fparentID=Request.Form("fparentID")
openTarget=Request.Form("openTarget")
Set rsChannelUpdate=Server.CreateObject("Adodb.Recordset")
SqlU="Select * from deep_Channel where fid="& ID
rsChannelUpdate.open SqlU,conn,3,2
rsChannelUpdate("fname")=ChannelName
rsChannelUpdate("ftip")=Readme
rsChannelUpdate("fviewType")=ViewType
rsChannelUpdate("flinkUrl")=LinkUrl
rsChannelUpdate("fcontentTitle")=ContentTittle
rsChannelUpdate("fcontent")=Content
rsChannelUpdate("fplace")=Place
rsChannelUpdate("forderID")=OrderID
rsChannelUpdate("fisView")=isView
rsChannelUpdate("fchannelPic")=fchannelPic
rsChannelUpdate("fuploadFiles")=fuploadFiles
rsChannelUpdate("fparentID")=fparentID
rsChannelUpdate("openTarget")=openTarget
rsChannelUpdate.update
rsChannelUpdate.close
Set rsChannelUpdate=Nothing
Response.Write("<p align='center'>["&ChannelName&"]频道栏目更改成功</p>")
end if
ID=Request.QueryString("id")
Set RsChannel=Server.CreateObject("Adodb.Recordset")
Sql="Select * from deep_Channel where fid=" & ID
RsChannel.open Sql,conn,0,1
%>
<form id="form1" name="form1" method="post" action="" onSubmit="return form1_onsubmit()">
<table width="99%" class="tableBoderForm">
<tr>
<td>频道栏目名称：</td>
<td><input name="ChannelName" type="text" value="<%=RsChannel("fname")%>" size="40" />
<span class="cRed">*</span>
</td>
</tr>
<tr>
<td>所属栏目分类：</td>
<td>
<select name="fparentID" id="fparentID">
<option value="0"> 根（作为一级栏目）</option>
<%
sql_channelClass="Select * from deep_Channel where fparentID=0 order by fOrderID"
Set rsChannelClass=conn.execute(sql_channelClass)
if rsChannelClass.Eof and rsChannelClass.Bof then
Response.Write("<option>暂时没有栏目！！！</option>")
else
while (not rsChannelClass.eof)
%>
<option value="<%=rsChannelClass("fid")%>" <%if(RsChannel("fparentID")=rsChannelClass("fid")) then%>selected="selected"<%end if%>><%=rsChannelClass("fname")%></option>
<%
call getSubList(rsChannelClass("fid"),RsChannel("fparentID"),0,"Select fid,fparentID,fname from deep_Channel")
rsChannelClass.MoveNext
wend
end if
rsChannelClass.close
Set rsChannelClass =Nothing
%>
</select>
</td>
</tr>
<tr>
<td>栏目简介：</td>
<td><textarea name="ReadMe" cols="70" rows="3"><%=RsChannel("ftip")%></textarea></td>
</tr>
<tr>
<td>排序ID：</td>
<td><input name="OrderID" type="text" value="<%=RsChannel("forderID")%>" /></td>
</tr>
<tr>
<td>显示位置：</td>
<td>
<input name="Place" type="radio" value="0" <%if RsChannel("fplace")=0 then %>checked="checked"<%end if%> />网页上部
<input type="radio" name="Place" value="1" <%if RsChannel("fplace")=1 then %>checked="checked"<%end if%>/>网页下部
<input type="radio" name="Place" value="2" <%if RsChannel("fplace")=2 then %>checked="checked"<%end if%>/>网页顶部
</td>
</tr>
<tr>
<td>频道图片：</td>
<td><input name="fchannelPic" type="text" id="fchannelPic" size="60" value="<%=RsChannel("fchannelPic")%>" /><br />
<iframe ID="UploadFiles" src="../include/upload_form.asp?SavePath=../../uploadFile/channel/&parentBackValue=form1.fchannelPic&MaxSize=500&FileType=gif/jpg/png/bmp&saveName=0" frameborder="0" scrolling="no" width="600" height="25"></iframe>
<br />上传图片尺寸视网站效果自定 </td>
</tr>
<tr>
<td>显示方式：</td>
<td>
<input name="ViewType" type="radio" value="0" onClick="view('viewType0')" <%if RsChannel("fviewType")=0 then %>checked="checked"<%end if%> />链接地址
<input type="radio" name="ViewType" value="1" onClick="view('viewType1')" <%if RsChannel("fviewType")=1 then %>checked="checked"<%end if%> />内容页
(* 首页图文时仅标题内容有效)
</td>
</tr>
<tr>
<td>打开方式：</td>
<td><input name="openTarget" type="radio" id="radio3" value="0" <%if RsChannel("openTarget")=0 then %>checked="checked"<%end if%> />原窗口
<input type="radio" name="openTarget" id="radio4" value="1" <%if RsChannel("openTarget")=1 then %>checked="checked"<%end if%>/>新窗口</td>
</tr>
<tr id="viewType0">
<td>链接地址：</td>
<td><input name="LinkUrl" type="text" id="LinkUrl" size="70" value="<%=RsChannel("flinkUrl")%>"/></td>
</tr>
<tr id="viewType1a">
<td>栏目标题：</td>
<td><input name="ContentTittle" type="text" value="<%=RsChannel("fcontentTitle")%>" size="70"></td>
</tr>
<tr id="viewType1b">
<td>栏目内容：</td>
<td><textarea name="Content" style="display:none"><%=RsChannel("fcontent")%></textarea>
<iframe id="eWebEditor1" src="../include/eWebEditor/eWebEditor.asp?id=Content&style=deep_light_channel&savefilename=fuploadFiles" frameborder="0" scrolling="no" width="650" height="400"></iframe>
<input type="hidden" name="fuploadFiles" id="fuploadFiles" />
</td>
</tr>
<tr>
<td>显示：</td>
<td><input name="isView" type="radio" id="radio" value="1" <%if (RsChannel("fisView")=1) then%>checked="checked"<%end if%> />显示
<input name="isView" type="radio" id="radio2" value="0" <%if (RsChannel("fisView")=0) then%>checked="checked"<%end if%>/>不显示</td>
</tr>
<tr>
<td><input type="hidden" name="ID" value="<%=ID%>" /></td>
<td><input type="submit" name="Submit" value="修改" />
<input type="reset" name="Reset" value="重置" /></td>
</tr>
</table>
</form>
<%
RsChannel.close
Set RsChannel=Nothing
Call CloseConnDB()
%>
<br />
</dd>
</dl>
<br />
<p align="center"><span class="cRed">*</span> 必添内容</p>
</body>
</html>